home *** CD-ROM | disk | FTP | other *** search
/ Chip 2007 January, February, March & April / Chip-Cover-CD-2007-02.iso / Pakiet bezpieczenstwa / mini Pentoo LiveCD 2006.1 / mpentoo-2006.1.iso / livecd.squashfs / usr / i686-pc-linux-gnu / gcc-bin / 3.3.6 / gccbug < prev    next >
Text File  |  2005-10-13  |  16KB  |  552 lines
  1. #!/bin/sh
  2. # Submit a problem report to a GNATS site.
  3. # Copyright (C) 1993, 2000, 2001, 2002 Free Software Foundation, Inc.
  4. # Contributed by Brendan Kehoe (brendan@cygnus.com), based on a
  5. # version written by Heinz G. Seidl (hgs@cygnus.com).
  6. #
  7. # This file is part of GNU GNATS.
  8. #
  9. # GNU GNATS is free software; you can redistribute it and/or modify
  10. # it under the terms of the GNU General Public License as published by
  11. # the Free Software Foundation; either version 2, or (at your option)
  12. # any later version.
  13. #
  14. # GNU GNATS is distributed in the hope that it will be useful,
  15. # but WITHOUT ANY WARRANTY; without even the implied warranty of
  16. # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  17. # GNU General Public License for more details.
  18. #
  19. # You should have received a copy of the GNU General Public License
  20. # along with GNU GNATS; see the file COPYING.  If not, write to
  21. # the Free Software Foundation, 59 Temple Place - Suite 330,
  22. # Boston, MA 02111-1307, USA.
  23.  
  24. # The version of this send-pr.
  25. VERSION=3.113
  26.  
  27. # The submitter-id for your site.
  28. SUBMITTER=net
  29.  
  30. # The default mail address for PR submissions. 
  31. GNATS_ADDR=gcc-gnats@gcc.gnu.org
  32.  
  33. # The default release for this host.
  34. DEFAULT_RELEASE="3.3.6 (Gentoo 3.3.6, ssp-3.3.6-1.0, pie-8.7.8)"
  35.  
  36. # The default organization.
  37. DEFAULT_ORGANIZATION=
  38.  
  39. # What mailer to use.  This must come after the config file, since it is
  40. # host-dependent.
  41. # Copied from cvsbug
  42. if [ -f /usr/sbin/sendmail ]; then  
  43.     MAIL_AGENT="/usr/sbin/sendmail -oi -t"
  44. else  
  45.     MAIL_AGENT="/usr/lib/sendmail -oi -t"
  46. fi
  47. MAILER=`echo $MAIL_AGENT | sed -e 's, .*,,'`
  48. if [ ! -f "$MAILER" ] ; then
  49.     echo "$COMMAND: Cannot file mail program \"$MAILER\"."
  50.     echo "$COMMAND: Please fix the MAIL_AGENT entry in the $COMMAND file."
  51.     exit 1
  52. fi
  53.  
  54.  
  55. # How to read the passwd database.
  56. PASSWD="cat /etc/passwd"
  57.  
  58. ECHON=bsd
  59.  
  60. if [ $ECHON = bsd ] ; then
  61.   ECHON1="echo -n"
  62.   ECHON2=
  63. elif [ $ECHON = sysv ] ; then
  64.   ECHON1=echo
  65.   ECHON2='\c'
  66. else
  67.   ECHON1=echo
  68.   ECHON2=
  69. fi
  70.  
  71. #
  72.  
  73. if [ -z "$TMPDIR" ]; then
  74.   TMPDIR=/tmp
  75. else
  76.   if [ "`echo $TMPDIR | grep '/$'`" != "" ]; then
  77.     TMPDIR="`echo $TMPDIR | sed -e 's,/$,,'`"
  78.   fi
  79. fi
  80.  
  81. if [ yes = yes ]; then
  82.     TEMP0=`mktemp $TMPDIR/poXXXXXX` || exit 1
  83.     TEMP=`mktemp $TMPDIR/pXXXXXX` || exit 1
  84.     BAD=`mktemp $TMPDIR/pbadXXXXXX` || exit 1
  85.     REF=`mktemp $TMPDIR/pfXXXXXX` || exit 1
  86.     REMOVE_TEMP="rm -f $TEMP0 $TEMP $BAD $REF"
  87. else
  88.     TEMPD=$TMPDIR/pd$$
  89.     TEMP0=$TEMPD/po$$
  90.     TEMP=$TEMPD/p$$
  91.     BAD=$TEMPD/pbad$$
  92.     REF=$TEMPD/pf$$
  93.     mkdir $TEMPD || exit 1
  94.     REMOVE_TEMP="rm -rf $TEMPD"
  95. fi
  96.  
  97. # find a user name
  98. if [ "$LOGNAME" = "" ]; then
  99.     if [ "$USER" != "" ]; then
  100.         LOGNAME="$USER"
  101.     else
  102.         LOGNAME="UNKNOWN"
  103.     fi
  104. fi
  105.  
  106. FROM="$LOGNAME"
  107. REPLY_TO="${REPLY_TO:-${REPLYTO:-$LOGNAME}}"
  108.  
  109. # Find out the name of the originator of this PR.
  110. if [ -n "$NAME" ]; then
  111.   ORIGINATOR="$NAME"
  112. elif [ -f $HOME/.fullname ]; then
  113.   ORIGINATOR="`sed -e '1q' $HOME/.fullname`"
  114. else
  115.   # Must use temp file due to incompatibilities in quoting behavior
  116.   # and to protect shell metacharacters in the expansion of $LOGNAME
  117.   $PASSWD | grep "^$LOGNAME:" | awk -F: '{print $5}' | sed -e 's/,.*//' > $TEMP0
  118.   ORIGINATOR="`cat $TEMP0`"
  119.   rm -f $TEMP0
  120. fi
  121.  
  122. if [ -n "$ORGANIZATION" ]; then
  123.   if [ -f "$ORGANIZATION" ]; then
  124.     ORGANIZATION="`cat $ORGANIZATION`"
  125.   fi
  126. else
  127.   if [ -n "$DEFAULT_ORGANIZATION" ]; then
  128.     ORGANIZATION="$DEFAULT_ORGANIZATION"
  129.   elif [ -f $HOME/.organization ]; then
  130.     ORGANIZATION="`cat $HOME/.organization`"
  131.   fi
  132. fi
  133.  
  134. # If they don't have a preferred editor set, then use
  135. if [ -z "$VISUAL" ]; then
  136.   if [ -z "$EDITOR" ]; then
  137.     EDIT=vi
  138.   else
  139.     EDIT="$EDITOR"
  140.   fi
  141. else
  142.   EDIT="$VISUAL"
  143. fi
  144.  
  145. # Find out some information.
  146. SYSTEM=`( [ -f /bin/uname ] && /bin/uname -a ) || \
  147.         ( [ -f /usr/bin/uname ] && /usr/bin/uname -a ) || echo ""`
  148. ARCH=`[ -f /bin/arch ] && /bin/arch`
  149. MACHINE=`[ -f /bin/machine ] && /bin/machine`
  150.  
  151. COMMAND=`echo $0 | sed -e 's,.*/,,'`
  152. USAGE="Usage: $COMMAND [-PVL] [-t address] [-f filename] [-s severity]
  153.        [-c address] [--request-id] [--version]"
  154. REMOVE=
  155. BATCH=
  156. CC=
  157. SEVERITY_C=
  158.  
  159. while [ $# -gt 0 ]; do
  160.   case "$1" in
  161.     -r) ;;         # Ignore for backward compat.
  162.     -t | --to) if [ $# -eq 1 ]; then echo "$USAGE"; $REMOVE_TEMP; exit 1; fi
  163.     shift ; GNATS_ADDR="$1"
  164.     EXPLICIT_GNATS_ADDR=true
  165.         ;;
  166.     -f | --file) if [ $# -eq 1 ]; then echo "$USAGE"; $REMOVE_TEMP; exit 1; fi
  167.     shift ; IN_FILE="$1"
  168.     if [ "$IN_FILE" != "-" -a ! -r "$IN_FILE" ]; then
  169.       echo "$COMMAND: cannot read $IN_FILE"
  170.       $REMOVE_TEMP
  171.       exit 1
  172.     fi
  173.     ;;
  174.     -b | --batch) BATCH=true ;;
  175.     -c | --cc) if [ $# -eq 1 ]; then echo "$USAGE"; $REMOVE_TEMP; exit 1; fi
  176.     shift ; CC="$1"
  177.     ;;
  178.     -s | --severity) if [ $# -eq 1 ]; then echo "$USAGE"; $REMOVE_TEMP; exit 1; fi
  179.     shift ; SEVERITY_C="$1"
  180.     ;;
  181.     -p | -P | --print) PRINT=true ;;
  182.     -L | --list) FORMAT=norm ;;
  183.     -l | -CL | --lisp) FORMAT=lisp ;;
  184.     --request-id) REQUEST_ID=true ;;
  185.     -h | --help) echo "$USAGE"; $REMOVE_TEMP; exit 0 ;;
  186.     -V | --version) cat <<EOF
  187. gccbug (GCC) $DEFAULT_RELEASE
  188. Copyright (C) 2002 Free Software Foundation, Inc.
  189. This is free software; see the source for copying conditions.  There is NO
  190. warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
  191.  
  192. EOF
  193.     $REMOVE_TEMP; exit 0 ;;
  194.     -*) echo "$USAGE" ; $REMOVE_TEMP; exit 1 ;;
  195.     *) echo "$USAGE" ; $REMOVE_TEMP; exit 1
  196.  esac
  197.  shift
  198. done
  199.  
  200. # spam does not need to be listed here
  201. CATEGORIES="ada bootstrap c++ c debug driver fortran inline-asm java libf2c libgcj libobjc libstdc++ middle-end objc other preprocessor rtl-optimization target tree-optimization web"
  202.  
  203. case "$FORMAT" in
  204.   lisp) echo "$CATEGORIES" | \
  205.         awk 'BEGIN {printf "( "} {printf "(\"%s\") ",$0} END {printf ")\n"}'
  206.     $REMOVE_TEMP
  207.         exit 0
  208.         ;;
  209.   norm) l=`echo "$CATEGORIES" | \
  210.     awk 'BEGIN {max = 0; } { if (length($0) > max) { max = length($0); } }
  211.          END {print max + 1;}'`
  212.     c=`expr 70 / $l`
  213.     if [ $c -eq 0 ]; then c=1; fi
  214.     echo "$CATEGORIES" | \
  215.         awk 'BEGIN {print "Known categories:"; i = 0 }
  216.           { printf ("%-'$l'.'$l's", $0); if ((++i % '$c') == 0) { print "" } }
  217.             END { print ""; }'
  218.     $REMOVE_TEMP
  219.         exit 0
  220.         ;;
  221. esac
  222.  
  223. ORIGINATOR_C='<name of the PR author (one line)>'
  224. ORGANIZATION_C='<organization of PR author (multiple lines)>'
  225. SYNOPSIS_C='<synopsis of the problem (one line)>'
  226. if [ -z "$SEVERITY_C" ]; then
  227.   SEVERITY_C='<[ non-critical | serious | critical ] (one line)>'
  228. fi
  229. PRIORITY_C='<[ low | medium ] (one line)>'
  230. CATEGORY_C='<choose from the top of this file (one line)>'
  231. RELEASE_C='<release number or tag (one line)>'
  232. ENVIRONMENT_C='<machine, os, target, libraries (multiple lines)>'
  233. DESCRIPTION_C='<precise description of the problem (multiple lines)>'
  234. HOW_TO_REPEAT_C='<When reporting a compiler error, preprocessor output must be included>'
  235. FIX_C='<how to correct or work around the problem, if known (multiple lines)>'
  236.  
  237. # Catch some signals. ($xs kludge needed by Sun /bin/sh)
  238. xs=0
  239. trap '$REMOVE_TEMP; exit $xs' 0
  240. trap 'echo "$COMMAND: Aborting ..."; $REMOVE_TEMP; xs=1; exit' 1 3 13 15
  241.  
  242. # If they told us to use a specific file, then do so.
  243. if [ -n "$IN_FILE" ]; then
  244.   if [ "$IN_FILE" = "-" ]; then
  245.     # The PR is coming from the standard input.
  246.     if [ -n "$EXPLICIT_GNATS_ADDR" ]; then
  247.       sed -e "s;^[Tt][Oo]:.*;To: $GNATS_ADDR;" > $TEMP
  248.     else
  249.       cat > $TEMP
  250.     fi
  251.   else
  252.     # Use the file they named.
  253.     if [ -n "$EXPLICIT_GNATS_ADDR" ]; then
  254.       sed -e "s;^[Tt][Oo]:.*;To: $GNATS_ADDR;" $IN_FILE > $TEMP
  255.     else
  256.       cat $IN_FILE > $TEMP
  257.     fi
  258.   fi
  259. else
  260.  
  261.   if [ -n "$PR_FORM" -a -z "$PRINT_INTERN" ]; then
  262.     # If their PR_FORM points to a bogus entry, then bail.
  263.     if [ ! -f "$PR_FORM" -o ! -r "$PR_FORM" -o ! -s "$PR_FORM" ]; then
  264.       echo "$COMMAND: can't seem to read your template file (\`$PR_FORM'), ignoring PR_FORM"
  265.       sleep 1
  266.       PRINT_INTERN=bad_prform
  267.     fi
  268.   fi
  269.  
  270.   if [ -n "$PR_FORM" -a -z "$PRINT_INTERN" ]; then
  271.     cp $PR_FORM $TEMP || 
  272.       ( echo "$COMMAND: could not copy $PR_FORM" ; xs=1; exit )
  273.   else
  274.     for file in $TEMP $REF ; do
  275.       cat  > $file << '__EOF__'
  276. SEND-PR: -*- send-pr -*-
  277. SEND-PR: Lines starting with `SEND-PR' will be removed automatically, as
  278. SEND-PR: will all comments (text enclosed in `<' and `>').
  279. SEND-PR: 
  280. SEND-PR: Please consult the GCC manual if you are not sure how to
  281. SEND-PR: fill out a problem report.
  282. SEND-PR: Note that the Synopsis field is mandatory.  The Subject (for
  283. SEND-PR: the mail) will be made the same as Synopsis unless explicitly
  284. SEND-PR: changed.
  285. SEND-PR:
  286. SEND-PR: Choose from the following categories:
  287. SEND-PR:
  288. __EOF__
  289.  
  290.       # Format the categories so they fit onto lines.
  291.     l=`echo "$CATEGORIES" | \
  292.     awk 'BEGIN {max = 0; } { if (length($0) > max) { max = length($0); } }
  293.          END {print max + 1;}'`
  294.     c=`expr 61 / $l`
  295.     if [ $c -eq 0 ]; then c=1; fi
  296.     echo "$CATEGORIES" | \
  297.         awk 'BEGIN {printf "SEND-PR: "; i = 0 }
  298.           { printf ("%-'$l'.'$l's", $0);
  299.         if ((++i % '$c') == 0) { printf "\nSEND-PR: " } }
  300.             END { printf "\nSEND-PR:\n"; }' >> $file
  301.  
  302.       cat >> $file << __EOF__
  303. To: $GNATS_ADDR
  304. Subject: 
  305. From: $FROM
  306. Reply-To: $REPLYTO
  307. Cc: $CC
  308. X-send-pr-version: $VERSION
  309. X-GNATS-Notify: 
  310.  
  311.  
  312. >Submitter-Id:    $SUBMITTER
  313. >Originator:    $ORIGINATOR
  314. >Organization:    ${ORGANIZATION-$ORGANIZATION_C}
  315. >Confidential:    no
  316. SEND-PR: Leave "Confidential" as "no"; all GCC PRs are public.
  317. >Synopsis:    $SYNOPSIS_C
  318. >Severity:    $SEVERITY_C
  319. SEND-PR: critical     GCC is completely not operational; no work-around known.
  320. SEND-PR: serious      GCC is not working properly; a work-around is possible.
  321. SEND-PR: non-critical Report indicates minor problem.
  322. >Priority:    $PRIORITY_C
  323. SEND-PR: medium       The problem should be solved in the next release.
  324. SEND-PR: low          The problem should be solve in a future release.
  325. >Category:    $CATEGORY_C
  326. >Class:        <[ doc-bug | accepts-illegal | rejects-legal | wrong-code | ice-on-legal-code| ice-on-illegal-code | pessimizes-code | sw-bug | change-request | support ] (one line)>
  327. SEND-PR: doc-bug          The documentation is incorrect.
  328. SEND-PR: accepts-illegal  GCC fails to reject erroneous code.
  329. SEND-PR: rejects-legal    GCC gives an error message for correct code.
  330. SEND-PR: wrong-code       The machine code generated by gcc is incorrect.
  331. SEND-PR: ice-on-legal-code   GCC gives an Internal Compiler Error (ICE)
  332. SEND-PR:                     for correct code
  333. SEND-PR: ice-on-illegal-code GCC gives an ICE instead of reporting an error
  334. SEND-PR: pessimizes-code     GCC misses an important optimization opportunity
  335. SEND-PR: sw-bug              Software bug of some other class than above
  336. SEND-PR: change-request      A feature in GCC is missing.
  337. SEND-PR: support             I need help with gcc.
  338. >Release:    ${DEFAULT_RELEASE-$RELEASE_C}
  339. >Environment:
  340. `[ -n "$SYSTEM" ] && echo System: $SYSTEM`
  341. `[ -n "$ARCH" ] && echo Architecture: $ARCH`
  342. `[ -n "$MACHINE" ] && echo Machine: $MACHINE`
  343.     $ENVIRONMENT_C
  344. host: i686-pc-linux-gnu
  345. build: i686-pc-linux-gnu
  346. target: i686-pc-linux-gnu
  347. configured with: /var/tmp/portage/gcc-3.3.6/work/gcc-3.3.6/configure --prefix=/usr --bindir=/usr/i686-pc-linux-gnu/gcc-bin/3.3.6 --includedir=/usr/lib/gcc-lib/i686-pc-linux-gnu/3.3.6/include --datadir=/usr/share/gcc-data/i686-pc-linux-gnu/3.3.6 --mandir=/usr/share/gcc-data/i686-pc-linux-gnu/3.3.6/man --infodir=/usr/share/gcc-data/i686-pc-linux-gnu/3.3.6/info --with-gxx-include-dir=/usr/lib/gcc-lib/i686-pc-linux-gnu/3.3.6/include/g++-v3 --host=i686-pc-linux-gnu --build=i686-pc-linux-gnu --disable-altivec --disable-nls --with-system-zlib --disable-checking --disable-werror --disable-libunwind-exceptions --disable-multilib --disable-libgcj --enable-languages=c,c++,f77 --enable-shared --enable-threads=posix --enable-__cxa_atexit --enable-clocale=gnu
  348. >Description:
  349.     $DESCRIPTION_C
  350. >How-To-Repeat:
  351.     $HOW_TO_REPEAT_C
  352. >Fix:
  353.     $FIX_C
  354. __EOF__
  355.     done
  356.   fi
  357.  
  358.   if [ "$PRINT" = true -o "$PRINT_INTERN" = true ]; then
  359.     cat $TEMP
  360.     xs=0; exit
  361.   fi
  362.  
  363.   chmod u+w $TEMP
  364.   if [ -z "$REQUEST_ID" ]; then
  365.     eval $EDIT $TEMP
  366.   else
  367.     ed -s $TEMP << '__EOF__'
  368. /^Subject/s/^Subject:.*/Subject: request for a customer id/
  369. /^>Category/s/^>Category:.*/>Category: send-pr/
  370. w
  371. q
  372. __EOF__
  373.   fi
  374.  
  375.   if cmp -s $REF $TEMP ; then
  376.     echo "$COMMAND: problem report not filled out, therefore not sent"
  377.     xs=1; exit
  378.   fi
  379. fi
  380.  
  381. #
  382. #    Check the enumeration fields
  383.  
  384. # This is a "sed-subroutine" with one keyword parameter 
  385. # (with workaround for Sun sed bug)
  386. #
  387. SED_CMD='
  388. /$PATTERN/{
  389. s|||
  390. s|<.*>||
  391. s|^[     ]*||
  392. s|[     ]*$||
  393. p
  394. q
  395. }'
  396.  
  397.  
  398. while [ -z "$REQUEST_ID" ]; do
  399.   CNT=0
  400.  
  401.   # 1) Confidential
  402.   #
  403.   PATTERN=">Confidential:"
  404.   CONFIDENTIAL=`eval sed -n -e "\"$SED_CMD\"" $TEMP`
  405.   case "$CONFIDENTIAL" in
  406.     no) CNT=`expr $CNT + 1` ;;
  407.     *) echo "$COMMAND: \`$CONFIDENTIAL' is not a valid value for \`Confidential'." ;;
  408.   esac
  409.   #
  410.   # 2) Severity
  411.   #
  412.   PATTERN=">Severity:"
  413.   SEVERITY=`eval sed -n -e "\"$SED_CMD\"" $TEMP`
  414.   case "$SEVERITY" in
  415.     ""|non-critical|serious|critical) CNT=`expr $CNT + 1` ;;
  416.     *)  echo "$COMMAND: \`$SEVERITY' is not a valid value for \`Severity'."
  417.   esac
  418.   #
  419.   # 3) Priority
  420.   #
  421.   PATTERN=">Priority:"
  422.   PRIORITY=`eval sed -n -e "\"$SED_CMD\"" $TEMP`
  423.   case "$PRIORITY" in
  424.     ""|low|medium) CNT=`expr $CNT + 1` ;;
  425.     high) echo "$COMMAND: \`Priority: high' is reserved for GCC maintainers." ;;
  426.     *)  echo "$COMMAND: \`$PRIORITY' is not a valid value for \`Priority'."
  427.   esac
  428.   #
  429.   # 4) Category
  430.   #
  431.   PATTERN=">Category:"
  432.   CATEGORY=`eval sed -n -e "\"$SED_CMD\"" $TEMP`
  433.   FOUND=
  434.   for C in $CATEGORIES
  435.   do
  436.     if [ "$C" = "$CATEGORY" ]; then FOUND=true ; break ; fi
  437.   done
  438.   if [ -n "$FOUND" ]; then
  439.     CNT=`expr $CNT + 1`    
  440.   else
  441.     if [ -z "$CATEGORY" ]; then
  442.       echo "$COMMAND: you must include a Category: field in your report."
  443.     else
  444.       echo "$COMMAND: \`$CATEGORY' is not a known category."
  445.     fi
  446.   fi
  447.   #
  448.   # 5) Class
  449.   #
  450.   PATTERN=">Class:"
  451.   CLASS=`eval sed -n -e "\"$SED_CMD\"" $TEMP`
  452.   case "$CLASS" in
  453.     ""|doc-bug|accepts-illegal|rejects-legal|wrong-code|ice-on-legal-code|ice-on-illegal-code|pessimizes-code|sw-bug|change-request|support) CNT=`expr $CNT + 1` ;;
  454.     *)  echo "$COMMAND: \`$CLASS' is not a valid value for \`Class'."
  455.   esac
  456.   #
  457.   # 6) Check that synopsis is not empty
  458.   #
  459.   if grep "^>Synopsis:[     ]*${SYNOPSIS_C}\$" $TEMP > /dev/null
  460.   then
  461.     echo "$COMMAND: Synopsis must not be empty."
  462.   else
  463.     CNT=`expr $CNT + 1`
  464.   fi
  465.  
  466.   [ $CNT -lt 6 -a -z "$BATCH" ] && 
  467.     echo "Errors were found with the problem report."
  468.  
  469.   while true; do
  470.     if [ -z "$BATCH" ]; then
  471.       $ECHON1 "a)bort, e)dit or s)end? $ECHON2"
  472.       read input
  473.     else
  474.       if [ $CNT -eq 6 ]; then
  475.         input=s
  476.       else
  477.         input=a
  478.       fi
  479.     fi
  480.     case "$input" in
  481.       a*)
  482.     if [ -z "$BATCH" ]; then
  483.       echo "$COMMAND: the problem report remains in $BAD and is not sent."
  484.       REMOVE_TEMP="rm -f $TEMP0 $TEMP $REF"
  485.       mv $TEMP $BAD
  486.         else
  487.       echo "$COMMAND: the problem report is not sent."
  488.     fi
  489.     xs=1; exit
  490.     ;;
  491.       e*)
  492.         eval $EDIT $TEMP
  493.     continue 2
  494.     ;;
  495.       s*)
  496.     break 2
  497.     ;;
  498.     esac
  499.   done
  500. done
  501.  
  502. #
  503. # Make sure the mail has got a Subject.  If not, use the same as
  504. # in Synopsis.
  505. #
  506.  
  507. if grep '^Subject:[     ]*$' $TEMP > /dev/null
  508. then
  509.   SYNOPSIS=`grep '^>Synopsis:' $TEMP | sed -e 's/^>Synopsis:[     ]*//'`
  510.   ed -s $TEMP << __EOF__
  511. /^Subject:/s/:.*\$/: $SYNOPSIS/
  512. w
  513. q
  514. __EOF__
  515. fi
  516.  
  517. #
  518. #    Remove comments and send the problem report
  519. #    (we have to use patterns, where the comment contains regex chars)
  520. #
  521. # /^>Originator:/s;$ORIGINATOR;;
  522. sed  -e "
  523. /^SEND-PR:/d
  524. /^>Organization:/,/^>[A-Za-z-]*:/s;$ORGANIZATION_C;;
  525. /^>Confidential:/s;<.*>;;
  526. /^>Synopsis:/s;$SYNOPSIS_C;;
  527. /^>Severity:/s;<.*>;;
  528. /^>Priority:/s;<.*>;;
  529. /^>Category:/s;$CATEGORY_C;;
  530. /^>Class:/s;<.*>;;
  531. /^>Release:/,/^>[A-Za-z-]*:/s;$RELEASE_C;;
  532. /^>Environment:/,/^>[A-Za-z-]*:/s;$ENVIRONMENT_C;;
  533. /^>Description:/,/^>[A-Za-z-]*:/s;$DESCRIPTION_C;;
  534. /^>How-To-Repeat:/,/^>[A-Za-z-]*:/s;$HOW_TO_REPEAT_C;;
  535. /^>Fix:/,/^>[A-Za-z-]*:/s;$FIX_C;;
  536. " $TEMP > $REF
  537.  
  538. if $MAIL_AGENT < $REF; then
  539.   echo "$COMMAND: problem report sent"
  540.   xs=0; exit
  541. else
  542.   echo "$COMMAND: mysterious mail failure."
  543.   if [ -z "$BATCH" ]; then
  544.     echo "$COMMAND: the problem report remains in $BAD and is not sent."
  545.     REMOVE_TEMP="rm -f $TEMP0 $TEMP $REF"
  546.     mv $REF $BAD
  547.   else
  548.     echo "$COMMAND: the problem report is not sent."
  549.   fi
  550.   xs=1; exit
  551. fi
  552.